home *** CD-ROM | disk | FTP | other *** search
/ The Ultimate Frank Lloyd…ght - America's Architect / Ultimate Frank Lloyd Wright, The - America's Architect (1994)(Microsoft Home).iso / pre / flw / flwrh2.dir / 00165_Script_165 < prev    next >
Text File  |  1994-11-15  |  2KB  |  82 lines
  1. on startMovie
  2.   cursor 4
  3.   global nowFrame, currIntro, currMM
  4.   set currMM = "FLWWT"
  5.   
  6.   preLoadCast 1,6
  7.   
  8.   puppetSprite 21, TRUE
  9.   puppetSprite 22, TRUE
  10.   puppetSprite 23, TRUE
  11.   puppetSprite 11, TRUE
  12.   set the immediate of sprite 23 to TRUE
  13.   set the stretch of sprite 23 to FALSE
  14. end startMovie
  15.  
  16. on stepMovie
  17.   global nowFrame,currFrame
  18.   if nowFrame  <> currFrame then
  19.     seeAlsoList
  20.     set currFrame = nowFrame
  21.   end if
  22. end stepMovie
  23.  
  24. on saveLocals
  25.   global lastMovie, lastFrame, nowFrame
  26.   set lastFrame = nowFrame
  27.   set lastMovie = "FLWRH2"
  28. end saveLocals
  29.  
  30. on buttonState
  31.   global FrankNav, bFlag
  32.   
  33.   if rollover(11) then
  34.     set the castNum of sprite 11 to 1082
  35.     if the mouseDown then
  36.       set the castNum of sprite 11 to 1083
  37.     end if
  38.   else
  39.     set the castNum of sprite 11 to 1081
  40.   end if
  41.   
  42.   if rollover(7) then
  43.     rollCheck
  44.   else
  45.     set pos = 0
  46.     cursor -1
  47.   end if
  48.   
  49.   if (the mouseV > 400) or (bFlag = TRUE) then
  50.     doState
  51.   end if
  52. end buttonState
  53.  
  54. on rollCheck
  55.   global right, left, forw, pos
  56.   if the mouseH>=446 and the mouseH<=537 and the mouseV>180 and the mouseV<420 then
  57.     if right = 1 then
  58.       set pos = 3
  59.       cursor [1065,1066]
  60.     else
  61.       set pos = 0
  62.       cursor [1071,1072]
  63.     end if
  64.   else if the mouseH>=217 and the mouseH<=308 and the mouseV>180 and the mouseV<420 then
  65.     if left = 1 then
  66.       set pos = 1
  67.       cursor [1069,1070]
  68.     else
  69.       set pos = 0
  70.       cursor [1071,1072]
  71.     end if
  72.   else if the mouseH>=307 and the mouseH<=447 and the mouseV>180 and the mousev<=420 then
  73.     if forw = 1 then
  74.       set pos = 2
  75.       cursor [1067,1068]
  76.     else
  77.       set pos = 0
  78.       cursor [1071,1072]
  79.     end if
  80.   end if
  81. end rollCheck
  82.